/ Erect Magazine 6 / Erect Magazine 6.iso / mac / PhotoBr2 / PhotoBr2.rsrc / VWFI_1024

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 03 68 8d 64 | 00 00 00 08 00 00 00 00 |.....h.d|........|
|00000010| 00 07 00 00 00 00 00 00 | 02 ed 00 00 03 11 00 00 |........|........|
|00000020| 03 23 00 00 03 23 00 00 | 03 25 00 00 03 25 00 00 |.#...#..|.%...%..|
|00000030| 03 25 6f 6e 20 53 74 61 | 72 74 4d 6f 76 69 65 0d |.%on Sta|rtMovie.|
|00000040| 20 20 20 20 47 6c 6f 62 | 61 6c 20 43 6f 6e 66 69 |    Glob|al Confi|
|00000050| 67 5f 47 0d 20 20 20 20 | 2d 2d 70 75 74 20 22 30 |g_G.    |--put "0|
|00000060| 2c 31 2c 35 22 20 69 6e | 74 6f 20 43 6f 6e 66 69 |,1,5" in|to Confi|
|00000070| 67 5f 47 0d 65 6e 64 0d | 2d 2d 0d 6f 6e 20 52 65 |g_G.end.|--.on Re|
|00000080| 61 64 50 69 63 74 0d 20 | 20 20 20 47 6c 6f 62 61 |adPict. |   Globa|
|00000090| 6c 20 50 68 6f 74 6f 4e | 6f 5f 47 0d 20 20 20 20 |l PhotoN|o_G.    |
|000000a0| 70 75 74 20 70 61 74 68 | 4e 61 6d 65 28 29 20 26 |put path|Name() &|
|000000b0| 20 22 50 48 4f 54 4f 3a | 50 49 43 54 3a 53 45 58 | "PHOTO:|PICT:SEX|
|000000c0| 3a 22 20 26 20 50 68 6f | 74 6f 4e 6f 5f 47 20 26 |:" & Pho|toNo_G &|
|000000d0| 20 22 2e 50 49 43 22 20 | 69 6e 74 6f 20 66 4e 61 | ".PIC" |into fNa|
|000000e0| 6d 65 0d 20 20 20 20 70 | 75 74 20 46 69 6c 65 49 |me.    p|ut FileI|
|000000f0| 4f 28 6d 4e 65 77 2c 20 | 22 72 65 61 64 22 2c 66 |O(mNew, |"read",f|
|00000100| 4e 61 6d 65 29 20 69 6e | 74 6f 20 6d 79 50 0d 20 |Name) in|to myP. |
|00000110| 20 20 20 69 66 20 6f 62 | 6a 65 63 74 50 28 6d 79 |   if ob|jectP(my|
|00000120| 50 29 20 74 68 65 6e 0d | 20 20 20 20 20 20 20 20 |P) then.|        |
|00000130| 73 65 74 20 74 68 65 20 | 70 69 63 74 75 72 65 20 |set the |picture |
|00000140| 6f 66 20 63 61 73 74 20 | 22 50 69 63 74 43 61 73 |of cast |"PictCas|
|00000150| 74 22 20 3d 20 6d 79 50 | 28 6d 52 65 61 64 50 49 |t" = myP|(mReadPI|
|00000160| 43 54 29 0d 20 20 20 20 | 20 20 20 20 6d 79 50 28 |CT).    |    myP(|
|00000170| 6d 44 69 73 70 6f 73 65 | 29 0d 20 20 20 20 65 6c |mDispose|).    el|
|00000180| 73 65 0d 20 20 20 20 20 | 20 20 20 62 65 65 70 20 |se.     |   beep |
|00000190| 31 0d 20 20 20 20 65 6e | 64 20 69 66 20 0d 65 6e |1.    en|d if .en|
|000001a0| 64 0d 2d 2d 0d 6f 6e 20 | 52 65 61 64 43 61 73 74 |d.--.on |ReadCast|
|000001b0| 0d 20 20 20 20 73 65 74 | 20 74 68 65 20 63 61 73 |.    set| the cas|
|000001c0| 74 4e 75 6d 20 6f 66 20 | 73 70 72 69 74 65 20 32 |tNum of |sprite 2|
|000001d0| 20 3d 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 | = the n|umber of|
|000001e0| 20 63 61 73 74 20 22 53 | 74 61 67 65 42 61 63 6b | cast "S|tageBack|
|000001f0| 22 0d 20 20 20 20 75 70 | 64 61 74 65 73 74 61 67 |".    up|datestag|
|00000200| 65 0d 20 20 20 20 2d 2d | 0d 20 20 20 20 47 6c 6f |e.    --|.    Glo|
|00000210| 62 61 6c 20 50 68 6f 74 | 6f 4e 6f 5f 47 2c 50 68 |bal Phot|oNo_G,Ph|
|00000220| 6f 74 6f 5f 47 0d 20 20 | 20 20 70 75 74 20 22 50 |oto_G.  |  put "P|
|00000230| 68 6f 74 6f 50 61 6c 22 | 26 50 68 6f 74 6f 4e 6f |hotoPal"|&PhotoNo|
|00000240| 5f 47 20 69 6e 74 6f 20 | 50 61 6c 5f 57 0d 20 20 |_G into |Pal_W.  |
|00000250| 20 20 70 75 70 70 65 74 | 50 61 6c 65 74 74 65 20 |  puppet|Palette |
|00000260| 50 61 6c 5f 57 2c 36 30 | 0d 20 20 20 20 75 70 64 |Pal_W,60|.    upd|
|00000270| 61 74 65 73 74 61 67 65 | 0d 20 20 20 20 2d 2d 0d |atestage|.    --.|
|00000280| 20 20 20 20 70 75 74 20 | 50 68 6f 74 6f 4e 6f 5f |    put |PhotoNo_|
|00000290| 47 2b 31 32 38 20 69 6e | 74 6f 20 50 68 6f 74 6f |G+128 in|to Photo|
|000002a0| 5f 57 0d 20 20 20 20 70 | 75 74 20 74 68 65 20 6e |_W.    p|ut the n|
|000002b0| 61 6d 65 20 6f 66 20 63 | 61 73 74 20 50 68 6f 74 |ame of c|ast Phot|
|000002c0| 6f 5f 57 20 69 6e 74 6f | 20 6e 61 6d 65 5f 57 0d |o_W into| name_W.|
|000002d0| 20 20 20 20 73 65 74 20 | 74 68 65 20 63 61 73 74 |    set |the cast|
|000002e0| 4e 75 6d 20 6f 66 20 73 | 70 72 69 74 65 20 32 20 |Num of s|prite 2 |
|000002f0| 3d 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |= the nu|mber of |
|00000300| 63 61 73 74 20 6e 61 6d | 65 5f 57 0d 20 20 20 20 |cast nam|e_W.    |
|00000310| 75 70 64 61 74 65 73 74 | 61 67 65 0d 65 6e 64 23 |updatest|age.end#|
|00000320| 51 75 61 64 72 61 39 35 | 30 20 2d 20 54 6f 74 61 |Quadra95|0 - Tota|
|00000330| 6c 20 4d 65 64 69 61 20 | 41 67 65 6e 63 79 2c 49 |l Media |Agency,I|
|00000340| 6e 63 2e 11 54 4d 41 20 | 2d 20 50 4d 38 31 30 30 |nc..TMA |- PM8100|
|00000350| 2f 38 30 41 56 00 00    |                         |/80AV.. |        |
+--------+-------------------------+-------------------------+--------+--------+